---
title: "Supplementary Tables"
output: html_document
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```

## For: “Let our ballots secure what our bullets have won”: Union Veterans and the Making of Radical Reconstruction

### Complete table results for analyses reported in tables and figures appearing in the main article and supplementary appendix.

<br>
<br>

---

### List of Tables, by Table and Figure number {#toc}

```{r echo = F, results = 'asis'}

for (t in 1:nrow(table_table)) {
  
  tab_name = table_table[t, name]
  tab_link = tab_name %>% str_replace_all(" ", "-")
  cat("\n- [", tab_name, "](#", tab_link, ")", sep = "")
  
}

```

---

## Tables

```{r echo = FALSE, results ='asis'}

for (t in 1:nrow(table_table)) {
  
  tab_name = table_table[t, name]
  tab_link = tab_name %>% str_replace_all(" ", "-")
  
  cat("\n<a id='",tab_link,"'></a>", sep = "")
  cat("\n<br>\n<br>")
  cat("\n<h3>", tab_name, "</h3>", sep = "")
  
  
  cat("\n<br>\n<br>")

  cat(table_table[t, table])
  cat("[Return to Table List](#toc)", sep = "")
  cat("\n<br>\n<br>")

}
```
